---
title: "家庭動態社會調查主樣本的生活滿意度"
output:
flexdashboard::flex_dashboard:
orientation: rows
source_code: embed
---
```{r setup, include=FALSE}
library(flexdashboard)
library(ggplot2)
```
```{r}
load("psfdPlot.Rda")
load("psfddata.Rda")
```
主樣本波次(1~5)
=======================================================================
Row
-------------------------------------
### 生活快樂與順遂分數
```{r}
graph$happylife
```
### 自己與其伴侶的健康分數
```{r}
graph$health
```
Row
----------------------------------------
### 工作、經濟滿意度分數
```{r}
graph$work
```
### 家庭、婚姻(同居)滿意度分數
```{r}
graph$family
```
1930~2000(每十年一波次)
=====================================================
Row
----------------------------------------
### 生活快樂與順遂分數
```{r}
graph$happylife_10
```
### 自己與其伴侶的健康分數
```{r}
graph$health_10
```
Row
----------------------------------------
### 工作、經濟滿意度分數
```{r}
graph$work_10
```
### 家庭、婚姻(同居)滿意度分數
```{r}
graph$family_10
```